home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The Casino• / •Las Vegas• / HyperSlots •••• / HyperSlots ееее.rsrc / XCMD_221_Talk.txt < prev   
Text File  |  1990-10-02  |  36KB  |  631 lines
  1. start:
  2. 00000000  6000 000A                bra        +0xC /* 0000000C */
  3. 00000004  0000 0000                ori.b      D0, 0x0
  4. 00000008  0000 0000                ori.b      D0, 0x0
  5. label0000000C:
  6. 0000000C  41FA FFF2                lea.l      A0, [PC - 0xE /* 00000000, value 0x6000000A '`\0\0\n', cstring "`" */]
  7. 00000010  21C8 09CE                move.l     [0x000009CE /* ToolScratch */], A0
  8. 00000014  6000 040E                bra        +0x410 /* 00000424 */
  9. fn00000018:
  10. 00000018  206F 0008                movea.l    A0, [A7 + 0x8]
  11. 0000001C  3F3C 0001                move.w     -[A7], 0x1
  12. 00000020  A9EE                     syscall    Pack7/DecStr68K
  13. 00000022  206F 0004                movea.l    A0, [A7 + 0x4]
  14. 00000026  2080                     move.l     [A0], D0
  15. 00000028  4EFA 0010                jmp        [PC + 0x10 /* 0000003A */]
  16. 0000002C  206F 0004                movea.l    A0, [A7 + 0x4]
  17. 00000030  202F 0008                move.l     D0, [A7 + 0x8]
  18. 00000034  3F3C 0000                move.w     -[A7], 0x0
  19. 00000038  A9EE                     syscall    Pack7/DecStr68K
  20. label0000003A:
  21. 0000003A  205F                     movea.l    A0, [A7]+
  22. 0000003C  504F                     addq.w     A7, 8
  23. 0000003E  4ED0                     jmp        [A0]
  24. 00000040  A02C                     syscall    InitApplZone
  25. 00000042  4EFA 019C                jmp        [PC + 0x19C /* 000001E0 */]
  26. 00000046  225F                     movea.l    A1, [A7]+
  27. 00000048  205F                     movea.l    A0, [A7]+
  28. 0000004A  A057                     syscall    SetAppBase/SetApplBase
  29. 0000004C  4EFA 0190                jmp        [PC + 0x190 /* 000001DE */]
  30. 00000050  225F                     movea.l    A1, [A7]+
  31. 00000052  204F                     movea.l    A0, A7
  32. 00000054  A019                     syscall    InitZone
  33. 00000056  DEFC 000E                add.w      A7, 0xE
  34. 0000005A  4EFA 0182                jmp        [PC + 0x182 /* 000001DE */]
  35. 0000005E  225F                     movea.l    A1, [A7]+
  36. 00000060  205F                     movea.l    A0, [A7]+
  37. 00000062  A02D                     syscall    SetApplLimit
  38. 00000064  4EFA 0178                jmp        [PC + 0x178 /* 000001DE */]
  39. 00000068  A036                     syscall    MoreMasters
  40. 0000006A  4EFA 0174                jmp        [PC + 0x174 /* 000001E0 */]
  41. 0000006E  A11A                     syscall    GetZone, flags=1
  42. 00000070  2F48 0004                move.l     [A7 + 0x4], A0
  43. 00000074  4EFA 016A                jmp        [PC + 0x16A /* 000001E0 */]
  44. 00000078  225F                     movea.l    A1, [A7]+
  45. 0000007A  205F                     movea.l    A0, [A7]+
  46. 0000007C  A01B                     syscall    SetZone
  47. 0000007E  4EFA 015E                jmp        [PC + 0x15E /* 000001DE */]
  48. 00000082  2F78 02A6 0004           move.l     [A7 + 0x4], [0x000002A6 /* SysZone */]
  49. 00000088  4EFA 015C                jmp        [PC + 0x15C /* 000001E6 */]
  50. 0000008C  2F78 02AA 0004           move.l     [A7 + 0x4], [0x000002AA /* ApplZone */]
  51. 00000092  4EFA 0152                jmp        [PC + 0x152 /* 000001E6 */]
  52. fn00000096:
  53. 00000096  225F                     movea.l    A1, [A7]+
  54. 00000098  201F                     move.l     D0, [A7]+
  55. 0000009A  A122                     syscall    NewHandle, flags=1
  56. 0000009C  2E88                     move.l     [A7], A0
  57. 0000009E  4EFA 013E                jmp        [PC + 0x13E /* 000001DE */]
  58. 000000A2  225F                     movea.l    A1, [A7]+
  59. 000000A4  205F                     movea.l    A0, [A7]+
  60. 000000A6  A023                     syscall    DisposHandle/DisposeHandle
  61. 000000A8  4EFA 0134                jmp        [PC + 0x134 /* 000001DE */]
  62. 000000AC  225F                     movea.l    A1, [A7]+
  63. 000000AE  205F                     movea.l    A0, [A7]+
  64. 000000B0  A025                     syscall    GetHandleSize
  65. 000000B2  2E80                     move.l     [A7], D0
  66. 000000B4  6A06                     bpl        +0x8 /* 000000BC */
  67. 000000B6  4297                     clr.l      [A7]
  68. 000000B8  4EFA 0124                jmp        [PC + 0x124 /* 000001DE */]
  69. label000000BC:
  70. 000000BC  4EFA 011E                jmp        [PC + 0x11E /* 000001DC */]
  71. 000000C0  225F                     movea.l    A1, [A7]+
  72. 000000C2  201F                     move.l     D0, [A7]+
  73. 000000C4  205F                     movea.l    A0, [A7]+
  74. 000000C6  A024                     syscall    SetHandleSize
  75. 000000C8  4EFA 0114                jmp        [PC + 0x114 /* 000001DE */]
  76. 000000CC  225F                     movea.l    A1, [A7]+
  77. 000000CE  205F                     movea.l    A0, [A7]+
  78. 000000D0  A126                     syscall    HandleZone, flags=1
  79. 000000D2  2E88                     move.l     [A7], A0
  80. 000000D4  4EFA 0108                jmp        [PC + 0x108 /* 000001DE */]
  81. 000000D8  225F                     movea.l    A1, [A7]+
  82. 000000DA  205F                     movea.l    A0, [A7]+
  83. 000000DC  A128                     syscall    RecoverHandle, flags=1
  84. 000000DE  2E88                     move.l     [A7], A0
  85. 000000E0  4EFA 00FA                jmp        [PC + 0xFA /* 000001DC */]
  86. 000000E4  225F                     movea.l    A1, [A7]+
  87. 000000E6  201F                     move.l     D0, [A7]+
  88. 000000E8  205F                     movea.l    A0, [A7]+
  89. 000000EA  A027                     syscall    ReallocateHandle
  90. 000000EC  4EFA 00F0                jmp        [PC + 0xF0 /* 000001DE */]
  91. 000000F0  225F                     movea.l    A1, [A7]+
  92. 000000F2  201F                     move.l     D0, [A7]+
  93. 000000F4  A11E                     syscall    NewPtr, flags=1
  94. 000000F6  2E88                     move.l     [A7], A0
  95. 000000F8  4EFA 00E4                jmp        [PC + 0xE4 /* 000001DE */]
  96. 000000FC  225F                     movea.l    A1, [A7]+
  97. 000000FE  205F                     movea.l    A0, [A7]+
  98. 00000100  A01F                     syscall    DisposPtr/DisposePtr
  99. 00000102  4EFA 00DA                jmp        [PC + 0xDA /* 000001DE */]
  100. 00000106  225F                     movea.l    A1, [A7]+
  101. 00000108  205F                     movea.l    A0, [A7]+
  102. 0000010A  A021                     syscall    GetPtrSize
  103. 0000010C  2E80                     move.l     [A7], D0
  104. 0000010E  6A06                     bpl        +0x8 /* 00000116 */
  105. 00000110  4297                     clr.l      [A7]
  106. 00000112  4EFA 00CA                jmp        [PC + 0xCA /* 000001DE */]
  107. label00000116:
  108. 00000116  4EFA 00C4                jmp        [PC + 0xC4 /* 000001DC */]
  109. 0000011A  225F                     movea.l    A1, [A7]+
  110. 0000011C  201F                     move.l     D0, [A7]+
  111. 0000011E  205F                     movea.l    A0, [A7]+
  112. 00000120  A020                     syscall    SetPtrSize
  113. 00000122  4EFA 00BA                jmp        [PC + 0xBA /* 000001DE */]
  114. 00000126  225F                     movea.l    A1, [A7]+
  115. 00000128  205F                     movea.l    A0, [A7]+
  116. 0000012A  A148                     syscall    PtrZone, flags=1
  117. 0000012C  2E88                     move.l     [A7], A0
  118. 0000012E  4EFA 00AE                jmp        [PC + 0xAE /* 000001DE */]
  119. 00000132  A01C                     syscall    FreeMem
  120. 00000134  2F40 0004                move.l     [A7 + 0x4], D0
  121. 00000138  4EFA 00AC                jmp        [PC + 0xAC /* 000001E6 */]
  122. 0000013C  225F                     movea.l    A1, [A7]+
  123. 0000013E  A11D                     syscall    MaxMem, flags=1
  124. 00000140  2208                     move.l     D1, A0
  125. 00000142  205F                     movea.l    A0, [A7]+
  126. 00000144  2081                     move.l     [A0], D1
  127. 00000146  2E80                     move.l     [A7], D0
  128. 00000148  4EFA 0092                jmp        [PC + 0x92 /* 000001DC */]
  129. 0000014C  225F                     movea.l    A1, [A7]+
  130. 0000014E  201F                     move.l     D0, [A7]+
  131. 00000150  A04C                     syscall    CompactMem
  132. 00000152  2E80                     move.l     [A7], D0
  133. 00000154  4EFA 0086                jmp        [PC + 0x86 /* 000001DC */]
  134. 00000158  225F                     movea.l    A1, [A7]+
  135. 0000015A  201F                     move.l     D0, [A7]+
  136. 0000015C  A040                     syscall    ResrvMem/ReserveMem
  137. 0000015E  4EFA 007E                jmp        [PC + 0x7E /* 000001DE */]
  138. 00000162  225F                     movea.l    A1, [A7]+
  139. 00000164  201F                     move.l     D0, [A7]+
  140. 00000166  A04D                     syscall    PurgeMem
  141. 00000168  4EFA 0074                jmp        [PC + 0x74 /* 000001DE */]
  142. 0000016C  225F                     movea.l    A1, [A7]+
  143. 0000016E  205F                     movea.l    A0, [A7]+
  144. 00000170  A02B                     syscall    EmptyHandle
  145. 00000172  4EFA 006A                jmp        [PC + 0x6A /* 000001DE */]
  146. 00000176  225F                     movea.l    A1, [A7]+
  147. 00000178  205F                     movea.l    A0, [A7]+
  148. 0000017A  A029                     syscall    HLock
  149. 0000017C  4EFA 0060                jmp        [PC + 0x60 /* 000001DE */]
  150. 00000180  225F                     movea.l    A1, [A7]+
  151. 00000182  205F                     movea.l    A0, [A7]+
  152. 00000184  A02A                     syscall    HUnlock
  153. 00000186  4EFA 0056                jmp        [PC + 0x56 /* 000001DE */]
  154. 0000018A  225F                     movea.l    A1, [A7]+
  155. 0000018C  205F                     movea.l    A0, [A7]+
  156. 0000018E  A049                     syscall    HPurge
  157. 00000190  4EFA 004C                jmp        [PC + 0x4C /* 000001DE */]
  158. 00000194  225F                     movea.l    A1, [A7]+
  159. 00000196  205F                     movea.l    A0, [A7]+
  160. 00000198  A04A                     syscall    HNoPurge
  161. 0000019A  4EFA 0042                jmp        [PC + 0x42 /* 000001DE */]
  162. 0000019E  225F                     movea.l    A1, [A7]+
  163. 000001A0  205F                     movea.l    A0, [A7]+
  164. 000001A2  A04B                     syscall    SetGrowZone
  165. 000001A4  4EFA 0038                jmp        [PC + 0x38 /* 000001DE */]
  166. 000001A8  2F78 0328 0004           move.l     [A7 + 0x4], [0x00000328 /* GZRootHnd */]
  167. 000001AE  4E75                     rts
  168. 000001B0  221F                     move.l     D1, [A7]+
  169. 000001B2  201F                     move.l     D0, [A7]+
  170. 000001B4  225F                     movea.l    A1, [A7]+
  171. 000001B6  205F                     movea.l    A0, [A7]+
  172. 000001B8  A02E                     syscall    BlockMove/BlockMoveData
  173. 000001BA  2241                     movea.l    A1, D1
  174. 000001BC  4EFA 0020                jmp        [PC + 0x20 /* 000001DE */]
  175. 000001C0  2F78 0108 0004           move.l     [A7 + 0x4], [0x00000108 /* MemTop */]
  176. 000001C6  4EFA 001E                jmp        [PC + 0x1E /* 000001E6 */]
  177. 000001CA  3F78 0220 0004           move.w     [A7 + 0x4], [0x00000220 /* MemErr */]
  178. 000001D0  4E75                     rts
  179. 000001D2  2F78 0130 0004           move.l     [A7 + 0x4], [0x00000130 /* ApplLimit */]
  180. 000001D8  4EFA 000C                jmp        [PC + 0xC /* 000001E6 */]
  181. label000001DC:
  182. 000001DC  7000                     moveq.l    D0, 0x00
  183. label000001DE:
  184. 000001DE  2F09                     move.l     -[A7], A1
  185. label000001E0:
  186. 000001E0  31C0 0220                move.w     [0x00000220 /* MemErr */], D0
  187. 000001E4  4E75                     rts
  188. label000001E6:
  189. 000001E6  7000                     moveq.l    D0, 0x00
  190. 000001E8  60F6                     bra        -0x8 /* 000001E0 */
  191. fn000001EA:
  192. 000001EA  2F0A                     move.l     -[A7], A2
  193. 000001EC  203C 0000 0064           move.l     D0, 0x64 /* 'd' */
  194. 000001F2  A122                     syscall    NewHandle, flags=1
  195. 000001F4  226F 0008                movea.l    A1, [A7 + 0x8]
  196. 000001F8  2288                     move.l     [A1], A0
  197. 000001FA  4A40                     tst.w      D0
  198. 000001FC  6620                     bne        +0x22 /* 0000021E */
  199. 000001FE  A029                     syscall    HLock
  200. 00000200  2450                     movea.l    A2, [A0]
  201. 00000202  7000                     moveq.l    D0, 0x00
  202. 00000204  7218                     moveq.l    D1, 0x18
  203. 00000206  204A                     movea.l    A0, A2
  204. label00000208:
  205. 00000208  20C0                     move.l     [A0]+, D0
  206. 0000020A  51C9 FFFC                dbf        D1, -0x6 /* 00000208 */
  207. 0000020E  4267                     clr.w      -[A7]
  208. 00000210  487A 00D2                pea.l      [PC + 0xD2 /* 000002E4, value 0x94D6163 '\tMac', pstring "MacinTalk" */]
  209. 00000214  A997                     syscall    OpenResFile
  210. 00000216  301F                     move.w     D0, [A7]+
  211. 00000218  6A12                     bpl        +0x14 /* 0000022C */
  212. 0000021A  3038 0A60                move.w     D0, [0x00000A60 /* ResErr */]
  213. label0000021E:
  214. 0000021E  245F                     movea.l    A2, [A7]+
  215. 00000220  2F57 0008                move.l     [A7 + 0x8], [A7]
  216. 00000224  508F                     addq.l     A7, 8
  217. 00000226  3F40 0004                move.w     [A7 + 0x4], D0
  218. 0000022A  4E75                     rts
  219. label0000022C:
  220. 0000022C  3540 004A                move.w     [A2 + 0x4A], D0
  221. 00000230  1F3C 0000                move.b     -[A7], 0x0
  222. 00000234  A99B                     syscall    SetResLoad
  223. 00000236  42A7                     clr.l      -[A7]
  224. 00000238  2F3C 4452 5652           move.l     -[A7], 0x44525652 /* 'DRVR' */
  225. 0000023E  487A 009C                pea.l      [PC + 0x9C /* 000002DC, value 0x72E5350, pstring ".SPEECH" */]
  226. 00000242  A9A1                     syscall    GetNamedResource
  227. 00000244  225F                     movea.l    A1, [A7]+
  228. 00000246  3038 0A60                move.w     D0, [0x00000A60 /* ResErr */]
  229. 0000024A  66D2                     bne        -0x2C /* 0000021E */
  230. 0000024C  1F3C 0001                move.b     -[A7], 0x1
  231. 00000250  A99B                     syscall    SetResLoad
  232. 00000252  2078 011C                movea.l    A0, [0x0000011C /* UTableBase */]
  233. 00000256  D0FC 0080                add.w      A0, 0x80
  234. 0000025A  303C 0020                move.w     D0, 0x20 /* ' ' */
  235. label0000025E:
  236. 0000025E  5340                     subq.w     D0, 1
  237. 00000260  0C40 0012                cmpi.w     D0, 0x12
  238. 00000264  6E06                     bgt        +0x8 /* 0000026C */
  239. 00000266  303C F060                move.w     D0, 0xF060
  240. 0000026A  60B2                     bra        -0x4C /* 0000021E */
  241. label0000026C:
  242. 0000026C  0CA0 0000 0000           cmpi.l     -[A0], 0x0
  243. 00000272  66EA                     bne        -0x14 /* 0000025E */
  244. 00000274  3200                     move.w     D1, D0
  245. 00000276  5241                     addq.w     D1, 1
  246. 00000278  4441                     neg.w      D1
  247. 0000027A  3541 0046                move.w     [A2 + 0x46], D1
  248. 0000027E  2F09                     move.l     -[A7], A1
  249. 00000280  3F00                     move.w     -[A7], D0
  250. 00000282  2F3C 0000 0000           move.l     -[A7], 0x0
  251. 00000288  A9A9                     syscall    SetResInfo
  252. 0000028A  2F09                     move.l     -[A7], A1
  253. 0000028C  A9A2                     syscall    LoadResource
  254. 0000028E  3038 0A60                move.w     D0, [0x00000A60 /* ResErr */]
  255. 00000292  2049                     movea.l    A0, A1
  256. 00000294  A029                     syscall    HLock
  257. 00000296  245F                     movea.l    A2, [A7]+
  258. 00000298  205F                     movea.l    A0, [A7]+
  259. 0000029A  201F                     move.l     D0, [A7]+
  260. 0000029C  225F                     movea.l    A1, [A7]+
  261. 0000029E  2F08                     move.l     -[A7], A0
  262. 000002A0  2F0A                     move.l     -[A7], A2
  263. 000002A2  2440                     movea.l    A2, D0
  264. 000002A4  2452                     movea.l    A2, [A2]
  265. 000002A6  2F0A                     move.l     -[A7], A2
  266. 000002A8  2452                     movea.l    A2, [A2]
  267. 000002AA  41EA 0000                lea.l      A0, [A2 + 0x0]
  268. 000002AE  2149 003C                move.l     [A0 + 0x3C], A1
  269. 000002B2  43FA 0028                lea.l      A1, [PC + 0x28 /* 000002DC, value 0x72E5350, pstring ".SPEECH" */]
  270. 000002B6  2149 0012                move.l     [A0 + 0x12], A1
  271. 000002BA  4268 0016                clr.w      [A0 + 0x16]
  272. 000002BE  4268 001A                clr.w      [A0 + 0x1A]
  273. 000002C2  42A8 001C                clr.l      [A0 + 0x1C]
  274. 000002C6  A000                     syscall    Open/PBHOpen/HOpen
  275. 000002C8  3F68 0010 000C           move.w     [A7 + 0xC], [A0 + 0x10]
  276. 000002CE  2568 0034 0042           move.l     [A2 + 0x42], [A0 + 0x34]
  277. 000002D4  205F                     movea.l    A0, [A7]+
  278. 000002D6  A02A                     syscall    HUnlock
  279. 000002D8  245F                     movea.l    A2, [A7]+
  280. 000002DA  4E75                     rts
  281. 000002DC  072E 5350                btst       [A6 + 0x5350], D3
  282. 000002E0  4545                     chk.w      D2, D5
  283. 000002E2  4348                     chk.w      D1, A0
  284. 000002E4  094D                     bchg       A5, D4
  285. 000002E6  6163                     bsr        +0x65 /* 0000034B */
  286. 000002E8  696E                     bvs        +0x70 /* 00000358 */
  287. 000002EA  5461                     addq.w     -[A1], 2
  288. 000002EC  6C6B                     bge        +0x6D /* 00000359 */
  289. fn000002EE:
  290. 000002EE  2F0A                     move.l     -[A7], A2
  291. 000002F0  206F 0008                movea.l    A0, [A7 + 0x8]
  292. 000002F4  A029                     syscall    HLock
  293. 000002F6  2450                     movea.l    A2, [A0]
  294. 000002F8  41EA 0000                lea.l      A0, [A2 + 0x0]
  295. 000002FC  A201                     syscall    Close, flags=2
  296. 000002FE  302A 004A                move.w     D0, [A2 + 0x4A]
  297. 00000302  6704                     beq        +0x6 /* 00000308 */
  298. 00000304  3F00                     move.w     -[A7], D0
  299. 00000306  A99A                     syscall    CloseResFile
  300. label00000308:
  301. 00000308  206F 0008                movea.l    A0, [A7 + 0x8]
  302. 0000030C  A02A                     syscall    HUnlock
  303. 0000030E  A023                     syscall    DisposHandle/DisposeHandle
  304. 00000310  245F                     movea.l    A2, [A7]+
  305. 00000312  2F57 0004                move.l     [A7 + 0x4], [A7]
  306. 00000316  588F                     addq.l     A7, 4
  307. 00000318  4E75                     rts
  308. fn0000031A:
  309. 0000031A  221F                     move.l     D1, [A7]+
  310. 0000031C  341F                     move.w     D2, [A7]+
  311. 0000031E  205F                     movea.l    A0, [A7]+
  312. 00000320  2F01                     move.l     -[A7], D1
  313. 00000322  2F08                     move.l     -[A7], A0
  314. 00000324  A029                     syscall    HLock
  315. 00000326  2250                     movea.l    A1, [A0]
  316. 00000328  4E56 FFE0                link       A6, -0x0020
  317. 0000032C  41EE FFE0                lea.l      A0, [A6 - 0x20]
  318. 00000330  3169 0046 0018           move.w     [A0 + 0x18], [A1 + 0x46]
  319. 00000336  317C 0002 001A           move.w     [A0 + 0x1A], 0x2
  320. 0000033C  3142 001C                move.w     [A0 + 0x1C], D2
  321. 00000340  A204                     syscall    Control, flags=2
  322. 00000342  4E5E                     unlink     A6
  323. 00000344  205F                     movea.l    A0, [A7]+
  324. 00000346  A02A                     syscall    HUnlock
  325. 00000348  4E75                     rts
  326. 0000034A  7400                     moveq.l    D2, 0x00
  327. 0000034C  221F                     move.l     D1, [A7]+
  328. 0000034E  141F                     move.b     D2, [A7]+
  329. 00000350  205F                     movea.l    A0, [A7]+
  330. 00000352  2F01                     move.l     -[A7], D1
  331. 00000354  2F08                     move.l     -[A7], A0
  332. 00000356  A029                     syscall    HLock
  333. label00000358:
  334. 00000358  2250                     movea.l    A1, [A0]
  335. 0000035A  4E56 FFE0                link       A6, -0x0020
  336. 0000035E  41EE FFE0                lea.l      A0, [A6 - 0x20]
  337. 00000362  3169 0046 0018           move.w     [A0 + 0x18], [A1 + 0x46]
  338. 00000368  317C 0003 001A           move.w     [A0 + 0x1A], 0x3
  339. 0000036E  3142 001C                move.w     [A0 + 0x1C], D2
  340. 00000372  A204                     syscall    Control, flags=2
  341. 00000374  4E5E                     unlink     A6
  342. 00000376  205F                     movea.l    A0, [A7]+
  343. 00000378  A02A                     syscall    HUnlock
  344. 0000037A  4E75                     rts
  345. fn0000037C:
  346. 0000037C  7400                     moveq.l    D2, 0x00
  347. 0000037E  225F                     movea.l    A1, [A7]+
  348. 00000380  141F                     move.b     D2, [A7]+
  349. 00000382  321F                     move.w     D1, [A7]+
  350. 00000384  205F                     movea.l    A0, [A7]+
  351. 00000386  2F09                     move.l     -[A7], A1
  352. 00000388  2F08                     move.l     -[A7], A0
  353. 0000038A  A029                     syscall    HLock
  354. 0000038C  2250                     movea.l    A1, [A0]
  355. 0000038E  4E56 FFE0                link       A6, -0x0020
  356. 00000392  41EE FFE0                lea.l      A0, [A6 - 0x20]
  357. 00000396  3169 0046 0018           move.w     [A0 + 0x18], [A1 + 0x46]
  358. 0000039C  317C 0000 001A           move.w     [A0 + 0x1A], 0x0
  359. 000003A2  3142 001C                move.w     [A0 + 0x1C], D2
  360. 000003A6  A204                     syscall    Control, flags=2
  361. 000003A8  317C 0004 001A           move.w     [A0 + 0x1A], 0x4
  362. 000003AE  3141 001C                move.w     [A0 + 0x1C], D1
  363. 000003B2  A204                     syscall    Control, flags=2
  364. 000003B4  4E5E                     unlink     A6
  365. 000003B6  205F                     movea.l    A0, [A7]+
  366. 000003B8  A02A                     syscall    HUnlock
  367. 000003BA  4E75                     rts
  368. fn000003BC:
  369. 000003BC  201F                     move.l     D0, [A7]+
  370. 000003BE  225F                     movea.l    A1, [A7]+
  371. 000003C0  205F                     movea.l    A0, [A7]+
  372. 000003C2  2F00                     move.l     -[A7], D0
  373. 000003C4  2F08                     move.l     -[A7], A0
  374. 000003C6  A029                     syscall    HLock
  375. 000003C8  2049                     movea.l    A0, A1
  376. 000003CA  A025                     syscall    GetHandleSize
  377. 000003CC  2F0A                     move.l     -[A7], A2
  378. 000003CE  246F 0004                movea.l    A2, [A7 + 0x4]
  379. 000003D2  2452                     movea.l    A2, [A2]
  380. 000003D4  41EA 0000                lea.l      A0, [A2 + 0x0]
  381. 000003D8  316A 0046 0018           move.w     [A0 + 0x18], [A2 + 0x46]
  382. 000003DE  2149 0020                move.l     [A0 + 0x20], A1
  383. 000003E2  2140 0024                move.l     [A0 + 0x24], D0
  384. 000003E6  A203                     syscall    Write, flags=2
  385. 000003E8  245F                     movea.l    A2, [A7]+
  386. 000003EA  205F                     movea.l    A0, [A7]+
  387. 000003EC  3F00                     move.w     -[A7], D0
  388. 000003EE  A02A                     syscall    HUnlock
  389. 000003F0  301F                     move.w     D0, [A7]+
  390. 000003F2  3F40 0004                move.w     [A7 + 0x4], D0
  391. 000003F6  4E75                     rts
  392. fn000003F8:
  393. 000003F8  206F 0010                movea.l    A0, [A7 + 0x10]
  394. 000003FC  2F6F 000C 0010           move.l     [A7 + 0x10], [A7 + 0xC]
  395. 00000402  2F6F 0008 000C           move.l     [A7 + 0xC], [A7 + 0x8]
  396. 00000408  2F6F 0004 0008           move.l     [A7 + 0x8], [A7 + 0x4]
  397. 0000040E  2F57 0004                move.l     [A7 + 0x4], [A7]
  398. 00000412  588F                     addq.l     A7, 4
  399. 00000414  A029                     syscall    HLock
  400. 00000416  2050                     movea.l    A0, [A0]
  401. 00000418  2068 0042                movea.l    A0, [A0 + 0x42]
  402. 0000041C  A029                     syscall    HLock
  403. 0000041E  2050                     movea.l    A0, [A0]
  404. 00000420  4ED0                     jmp        [A0]
  405. 00000422  4E75                     rts
  406. label00000424:
  407. 00000424  4E56 FFF0                link       A6, -0x0010
  408. 00000428  4E71                     nop
  409. 0000042A  4E71                     nop
  410. 0000042C  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  411. 00000430  4EBA 0098                jsr        [PC + 0x98 /* 000004CA */]
  412. 00000434  4E5E                     unlink     A6
  413. 00000436  205F                     movea.l    A0, [A7]+
  414. 00000438  584F                     addq.w     A7, 4
  415. 0000043A  4ED0                     jmp        [A0]
  416. 0000043C  4D41                     chk.w      D6, D1
  417. 0000043E  494E                     chk.w      D4, A6
  418. 00000440  2020                     move.l     D0, -[A0]
  419. 00000442  2020                     move.l     D0, -[A0]
  420. fn00000444:
  421. 00000444  4E56 FFF0                link       A6, -0x0010
  422. 00000448  48E7 0008                movem.l    -[A7], A4
  423. 0000044C  206E 0008                movea.l    A0, [A6 + 0x8]
  424. 00000450  2008                     move.l     D0, A0
  425. 00000452  6602                     bne        +0x4 /* 00000456 */
  426. 00000454  4E40                     trap       0
  427. label00000456:
  428. 00000456  49D0                     lea.l      A4, [A0]
  429. 00000458  296E 0010 0050           move.l     [A4 + 0x50], [A6 + 0x10]
  430. 0000045E  206E 000C                movea.l    A0, [A6 + 0xC]
  431. 00000462  2948 0054                move.l     [A4 + 0x54], A0
  432. 00000466  397C 0008 004C           move.w     [A4 + 0x4C], 0x8
  433. 0000046C  2F2C 0048                move.l     -[A7], [A4 + 0x48]
  434. 00000470  205F                     movea.l    A0, [A7]+
  435. 00000472  4E90                     jsr        [A0]
  436. 00000474  4CDF 1000                movem.l    A4, [A7]+
  437. 00000478  4E5E                     unlink     A6
  438. 0000047A  205F                     movea.l    A0, [A7]+
  439. 0000047C  4FEF 000C                lea.l      A7, [A7 + 0xC]
  440. 00000480  4ED0                     jmp        [A0]
  441. 00000482  5A45                     addq.w     D5, 5
  442. 00000484  524F                     addq.w     A7, 1
  443. 00000486  544F                     addq.w     A7, 2
  444. 00000488  5041                     addq.w     D1, 8
  445. fn0000048A:
  446. 0000048A  4E56 FEF0                link       A6, -0x0110
  447. 0000048E  4E71                     nop
  448. 00000490  4E71                     nop
  449. 00000492  206E 000E                movea.l    A0, [A6 + 0xE]
  450. 00000496  43EE FEF0                lea.l      A1, [A6 - 0x110]
  451. 0000049A  703F                     moveq.l    D0, 0x3F
  452. label0000049C:
  453. 0000049C  22D8                     move.l     [A1]+, [A0]+
  454. 0000049E  51C8 FFFC                dbf        D0, -0x6 /* 0000049C */
  455. 000004A2  4A6E 000C                tst.w      [A6 + 0xC]
  456. 000004A6  6C00 0010                bge        +0x12 /* 000004B8 */
  457. 000004AA  206E 0008                movea.l    A0, [A6 + 0x8]
  458. 000004AE  2F28 FFE8                move.l     -[A7], [A0 - 0x18]
  459. 000004B2  4EBA FE3A                jsr        [PC - 0x1C6 /* 000002EE */]
  460. 000004B6  A9F4                     syscall    ExitToShell
  461. label000004B8:
  462. 000004B8  4E5E                     unlink     A6
  463. 000004BA  205F                     movea.l    A0, [A7]+
  464. 000004BC  4FEF 000A                lea.l      A7, [A7 + 0xA]
  465. 000004C0  4ED0                     jmp        [A0]
  466. 000004C2  5245                     addq.w     D5, 1
  467. 000004C4  504F                     addq.w     A7, 8
  468. 000004C6  5254                     addq.w     [A4], 1
  469. 000004C8  4552                     chk.w      D2, [A2]
  470. fn000004CA:
  471. 000004CA  4E56 FDD4                link       A6, -0x022C
  472. 000004CE  4E71                     nop
  473. 000004D0  4E71                     nop
  474. 000004D2  206E 0008                movea.l    A0, [A6 + 0x8]
  475. 000004D6  2008                     move.l     D0, A0
  476. 000004D8  6602                     bne        +0x4 /* 000004DC */
  477. 000004DA  4E40                     trap       0
  478. label000004DC:
  479. 000004DC  0C50 0003                cmpi.w     [A0], 0x3
  480. 000004E0  6600 017A                bne        +0x17C /* 0000065C */
  481. 000004E4  206E 0008                movea.l    A0, [A6 + 0x8]
  482. 000004E8  2008                     move.l     D0, A0
  483. 000004EA  6602                     bne        +0x4 /* 000004EE */
  484. 000004EC  4E40                     trap       0
  485. label000004EE:
  486. 000004EE  2068 0002                movea.l    A0, [A0 + 0x2]
  487. 000004F2  2008                     move.l     D0, A0
  488. 000004F4  6602                     bne        +0x4 /* 000004F8 */
  489. 000004F6  4E40                     trap       0
  490. label000004F8:
  491. 000004F8  2F10                     move.l     -[A7], [A0]
  492. 000004FA  486E FED4                pea.l      [A6 - 0x12C]
  493. 000004FE  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  494. 00000502  4EBA FF40                jsr        [PC - 0xC0 /* 00000444 */]
  495. 00000506  206E 0008                movea.l    A0, [A6 + 0x8]
  496. 0000050A  2008                     move.l     D0, A0
  497. 0000050C  6602                     bne        +0x4 /* 00000510 */
  498. 0000050E  4E40                     trap       0
  499. label00000510:
  500. 00000510  2068 0006                movea.l    A0, [A0 + 0x6]
  501. 00000514  2008                     move.l     D0, A0
  502. 00000516  6602                     bne        +0x4 /* 0000051A */
  503. 00000518  4E40                     trap       0
  504. label0000051A:
  505. 0000051A  2F10                     move.l     -[A7], [A0]
  506. 0000051C  486E FDD4                pea.l      [A6 - 0x22C]
  507. 00000520  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  508. 00000524  4EBA FF1E                jsr        [PC - 0xE2 /* 00000444 */]
  509. 00000528  486E FDD4                pea.l      [A6 - 0x22C]
  510. 0000052C  486E FFDC                pea.l      [A6 - 0x24]
  511. 00000530  4EBA FAE6                jsr        [PC - 0x51A /* 00000018 */]
  512. 00000534  202E FFDC                move.l     D0, [A6 - 0x24]
  513. 00000538  81FC 0001                divs.w     D0, 0x1
  514. 0000053C  4E76                     trapv
  515. 0000053E  5340                     subq.w     D0, 1
  516. 00000540  4E76                     trapv
  517. 00000542  5240                     addq.w     D0, 1
  518. 00000544  3D40 FFE6                move.w     [A6 - 0x1A], D0
  519. 00000548  4A6E FFE6                tst.w      [A6 - 0x1A]
  520. 0000054C  6E00 0008                bgt        +0xA /* 00000556 */
  521. 00000550  3D7C 0014 FFE6           move.w     [A6 - 0x1A], 0x14
  522. label00000556:
  523. 00000556  206E 0008                movea.l    A0, [A6 + 0x8]
  524. 0000055A  2008                     move.l     D0, A0
  525. 0000055C  6602                     bne        +0x4 /* 00000560 */
  526. 0000055E  4E40                     trap       0
  527. label00000560:
  528. 00000560  2068 000A                movea.l    A0, [A0 + 0xA]
  529. 00000564  2008                     move.l     D0, A0
  530. 00000566  6602                     bne        +0x4 /* 0000056A */
  531. 00000568  4E40                     trap       0
  532. label0000056A:
  533. 0000056A  2F10                     move.l     -[A7], [A0]
  534. 0000056C  486E FDD4                pea.l      [A6 - 0x22C]
  535. 00000570  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  536. 00000574  4EBA FECE                jsr        [PC - 0x132 /* 00000444 */]
  537. 00000578  486E FDD4                pea.l      [A6 - 0x22C]
  538. 0000057C  486E FFD8                pea.l      [A6 - 0x28]
  539. 00000580  4EBA FA96                jsr        [PC - 0x56A /* 00000018 */]
  540. 00000584  202E FFD8                move.l     D0, [A6 - 0x28]
  541. 00000588  81FC 0001                divs.w     D0, 0x1
  542. 0000058C  4E76                     trapv
  543. 0000058E  5340                     subq.w     D0, 1
  544. 00000590  4E76                     trapv
  545. 00000592  5240                     addq.w     D0, 1
  546. 00000594  3D40 FFE4                move.w     [A6 - 0x1C], D0
  547. 00000598  4A6E FFE4                tst.w      [A6 - 0x1C]
  548. 0000059C  6E00 0008                bgt        +0xA /* 000005A6 */
  549. 000005A0  3D7C 0096 FFE4           move.w     [A6 - 0x1C], 0x96
  550. label000005A6:
  551. 000005A6  4A2E FED4                tst.b      [A6 - 0x12C]
  552. 000005AA  6700 00B0                beq        +0xB2 /* 0000065C */
  553. 000005AE  554F                     subq.w     A7, 2
  554. 000005B0  487A 00CC                pea.l      [PC + 0xCC /* 0000067E, cstring "" */]
  555. 000005B4  486E FFE8                pea.l      [A6 - 0x18]
  556. 000005B8  4EBA FC30                jsr        [PC - 0x3D0 /* 000001EA */]
  557. 000005BC  4A5F                     tst.w      [A7]+
  558. 000005BE  6600 009C                bne        +0x9E /* 0000065C */
  559. 000005C2  594F                     subq.w     A7, 4
  560. 000005C4  42A7                     clr.l      -[A7]
  561. 000005C6  4EBA FACE                jsr        [PC - 0x532 /* 00000096 */]
  562. 000005CA  2D5F FFEC                move.l     [A6 - 0x14], [A7]+
  563. 000005CE  2F2E FFE8                move.l     -[A7], [A6 - 0x18]
  564. 000005D2  302E FFE6                move.w     D0, [A6 - 0x1A]
  565. 000005D6  5340                     subq.w     D0, 1
  566. 000005D8  4E76                     trapv
  567. 000005DA  5240                     addq.w     D0, 1
  568. 000005DC  3F00                     move.w     -[A7], D0
  569. 000005DE  4EBA FD3A                jsr        [PC - 0x2C6 /* 0000031A */]
  570. 000005E2  2F2E FFE8                move.l     -[A7], [A6 - 0x18]
  571. 000005E6  302E FFE4                move.w     D0, [A6 - 0x1C]
  572. 000005EA  5340                     subq.w     D0, 1
  573. 000005EC  4E76                     trapv
  574. 000005EE  5240                     addq.w     D0, 1
  575. 000005F0  3F00                     move.w     -[A7], D0
  576. 000005F2  1F3C 0002                move.b     -[A7], 0x2
  577. 000005F6  4EBA FD84                jsr        [PC - 0x27C /* 0000037C */]
  578. 000005FA  487A 007A                pea.l      [PC + 0x7A /* 00000676, value 0x6526561, pstring "Reader" */]
  579. 000005FE  554F                     subq.w     A7, 2
  580. 00000600  2F2E FFE8                move.l     -[A7], [A6 - 0x18]
  581. 00000604  41EE FED4                lea.l      A0, [A6 - 0x12C]
  582. 00000608  2008                     move.l     D0, A0
  583. 0000060A  5280                     addq.l     D0, 1
  584. 0000060C  4E76                     trapv
  585. 0000060E  2F00                     move.l     -[A7], D0
  586. 00000610  7000                     moveq.l    D0, 0x00
  587. 00000612  102E FED4                move.b     D0, [A6 - 0x12C]
  588. 00000616  48C0                     ext.l      D0
  589. 00000618  2F00                     move.l     -[A7], D0
  590. 0000061A  2F2E FFEC                move.l     -[A7], [A6 - 0x14]
  591. 0000061E  4EBA FDD8                jsr        [PC - 0x228 /* 000003F8 */]
  592. 00000622  301F                     move.w     D0, [A7]+
  593. 00000624  5340                     subq.w     D0, 1
  594. 00000626  4E76                     trapv
  595. 00000628  5240                     addq.w     D0, 1
  596. 0000062A  3F00                     move.w     -[A7], D0
  597. 0000062C  2F0E                     move.l     -[A7], A6
  598. 0000062E  4EBA FE5A                jsr        [PC - 0x1A6 /* 0000048A */]
  599. 00000632  487A 0038                pea.l      [PC + 0x38 /* 0000066C, value 0x94D6163 '\tMac', pstring "Macintalk" */]
  600. 00000636  554F                     subq.w     A7, 2
  601. 00000638  2F2E FFE8                move.l     -[A7], [A6 - 0x18]
  602. 0000063C  2F2E FFEC                move.l     -[A7], [A6 - 0x14]
  603. 00000640  4EBA FD7A                jsr        [PC - 0x286 /* 000003BC */]
  604. 00000644  301F                     move.w     D0, [A7]+
  605. 00000646  5340                     subq.w     D0, 1
  606. 00000648  4E76                     trapv
  607. 0000064A  5240                     addq.w     D0, 1
  608. 0000064C  3F00                     move.w     -[A7], D0
  609. 0000064E  2F0E                     move.l     -[A7], A6
  610. 00000650  4EBA FE38                jsr        [PC - 0x1C8 /* 0000048A */]
  611. 00000654  2F2E FFE8                move.l     -[A7], [A6 - 0x18]
  612. 00000658  4EBA FC94                jsr        [PC - 0x36C /* 000002EE */]
  613. label0000065C:
  614. 0000065C  4E5E                     unlink     A6
  615. 0000065E  205F                     movea.l    A0, [A7]+
  616. 00000660  584F                     addq.w     A7, 4
  617. 00000662  4ED0                     jmp        [A0]
  618. 00000664  5350                     subq.w     [A0], 1
  619. 00000666  4541                     chk.w      D2, D1
  620. 00000668  4B20                     .invalid   5, -[A0] // invalid opcode 4 with b == 4
  621. 0000066A  2020                     move.l     D0, -[A0]
  622. 0000066C  094D                     bchg       A5, D4
  623. 0000066E  6163                     bsr        +0x65 /* 000006D3 */
  624. 00000670  696E                     bvs        +0x70 /* 000006E0 */
  625. 00000672  7461                     moveq.l    D2, 0x61
  626. 00000674  6C6B                     bge        +0x6D /* 000006E1 */
  627. 00000676  0652 6561                addi.w     [A2], 0x6561 /* 'ea' */
  628. 0000067A  6465                     bcc        +0x67 /* 000006E1 */
  629. 0000067C  7212                     moveq.l    D1, 0x12
  630. 0000067E  0012                     .incomplete
  631.